home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 June / CHIP Haziran 2001.iso / prog / share / 04 / setup.exe / MM6.Cab / F1704_MainLoop.scpt.F6A680DD_F3FB_4CF3_BABB_0D0F06E630F5 < prev    next >
Text File  |  2000-08-17  |  1KB  |  30 lines
  1. CSLoopIsRunning = false; CSFctArray = new Array; CSTimeoutID = null;
  2. function CSLoop() {    
  3.     CSLoopIsRunning = false;
  4.     for (i=0;i<CSFctArray.length;i++) {
  5.         var curFct = CSFctArray[i];
  6.         if (curFct)    {
  7.             if (curFct.DoFunction(curFct)) { CSLoopIsRunning = true; curFct.counter++; }
  8.             else CSFctArray[i] = 0;
  9.         }
  10.     }
  11.     if (CSLoopIsRunning) CSTimeoutID = setTimeout("CSLoop()", 1);
  12. }
  13. function CSStartFunction(fct,data) {
  14.     if (!CSLoopIsRunning) { CSFctArray = 0; CSFctArray = new Array; }
  15.     var fctInfo = new Object;
  16.     fctInfo.DoFunction = fct; fctInfo.counter = 0; fctInfo.data = data;
  17.     CSFctArray[CSFctArray.length] = fctInfo; 
  18.     if (!CSLoopIsRunning) CSLoop();
  19. }
  20. function CSStopFunction(sceneName) {
  21.     var i;
  22.     for (i=0;i<CSFctArray.length;i++) {
  23.         var curFct = CSFctArray[i];
  24.         if (curFct){ if (curFct.data.name == sceneName){ CSFctArray[i] = 0; return; } }
  25.     }
  26. }
  27. function CSStopComplete() {
  28.     if (CSTimeoutID == null) return;
  29.     clearTimeout (CSTimeoutID); CSLoopIsRunning = false; CSTimeoutID = null;
  30. }